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SECWLEON *t2 INTRODUCTION 
He Purpese of the Validation Summary report 


re purpose of the Validation Summary Report (VS®) is to identify individual 
JBOL Lanacuage elements whose implementation does not conform to American 
ational Standard Procramming Lanquage CUSONL- X3.24-1974, and to Federal Stan- 
jard COETL aS adonted from the American National Standard hy Federal Information 
Focessina Standard 27-1 CFIPS PUB 21-1). 


T.e Preparation of the VSR 


The Validation Summary Report 18 prepared by analyzina the results of runnina 
the COBCL Compiler Validation System (€CCVS). The COROL Compiler Validation 
System consists of audit routines containina features of Federal Standard COBOL, 
their releted date- and en executive routine (VP-routine) which prepares the 
audit routines for compiletion. Fach audit reutine is @ COPOL proaram which 
includes many tests and supporting procedures indicating the result of the 
tests. 


The testing of a compiler in a oarticular hardware/operatina system environment 
is accomelisned by compiling and executing each audit routine. The report pro- 
duced by each routine tells whether the compiler pessed or tailed the tests in 
the routine. If the comnitler rejects some Language elements by terminating 
compiletions civing fetal diaenostic messages, or terminating execution abnor- 
nally, then the test containina the code the comoiler was unable to process is 
feletec ana the audit routine compilation and execution repeated. 


FA oN CARE NOON ERE AR RST pn hem ate 


The compilation Listings and the outout reports of the audit routines con- 
stitute the raw deta from which the members of the Federal COBOL Compiler 
Testine Service produce a Validation Summary Report. 


co 


bes raoanization of the VSP 


inl 


he Validation Summary Report is made up of several sectians the contents of 
which are descrtbed below. 


a ection 2 Summarizes the results of the compilation and execution 
of the programs comprisina the C°BOL Compiler Validation System. Section 2 
15 Sutdiviced inte a subsection representing each level of each module defined 
in American National Standard Prourammina Lanauace COFOLs X3.2371974. Each 
sunsection contains a list of all of the lansuage elements which must be 
tmplementec in order to claim support of that level/module. The List of 
lLanguace elements will be annotated to include a description of toth syntax 
rnd semantic errors detected Gurina the validation. 


bi. Section 3 = FIPS PUB 21-1 defines four federal levels of the COBOL 
»tandard. Section 3.17 of the VSR Lists the discrepancies described in Section 2 
by the Federat Level in which the problem occurs. Section 4.2 lists discrepan- 
cies for the Keport writer “odules which is not a part of Federal Standard 


cOPOL. 


Ge Section 4 contains information which descerthes the software environ- 


i, 
4 
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ment in which the compiler was testec. This includes the name and version of 
the operatine systen; the inplementor-names which were used in the Fnvironment 
Division of the programs comprisine the CCVS; the options used with the com- 
piler; and if applicable- information reaardtng the use of compiler optimiza- 
tion features. 


d.. Section 5S contains the results of the ASCII validation. The purpose 
of these tests 15 to ascertain whether macanetic tapes written tn ASCII code and 
with ANSI standard labels, end card cecks with ASCII coder can be transported 
between the system beinae validateo and a foreign computer system. 

&. Appendix A is the Validation Summary workine Pocumerts a working 
paper resulting from tte compilation and execution of the CCVS, and from which 
tme VSR is derived. 


1.4 Abstract Covering Compliance to American National Standard Programming 
Lanauace COG 


Definition of an Imnlementation ot American “National Stanctard Proacrammina 
Language COBOL Cexcerpts from K3.235-1974- Chapter 1+ Section 1.5). 


An implementation is cefined to meet the requirements of tne American 
National Standard COBTCL specification if that implementation includes a 
fully imonlementea specified level of each of the functional wrocessing 
nmocules and of the Nucleus as defined in this Standard. It follows from 
this that, tn oraer to meet the reauitrements of this Standards an imple- 
mentation must: 


a. Not require the inclusion of substitute cr acditional lLanquage ele- 
ments tin the source proarams itn order to accomplish any part of the function 
of any af the standard language elements. 


b. KRecept all standard lanauaae elements contetined in a given level 
of a module which is specified as being included in the implementation, 
exceot as specifically exenoted (as pertaining te specific hardware components 
for which support is net claimed). See “Elements that Pertain to Specific 
iardware Components” below. 


These points are of particular pertinence in two areas: 


(1) There are throuohout the American National Standard COROL 
specification certain lanauaqe elements whose syntaxs or effects is soecified 
to be, In parts implementor-defined. while the implenentor specifies the 
constraints on that portion of each element*s syntax or rules that ts indi- 
cated in this Standard to be implementor-defineds such constraints may not 
jncltude any requirement for the inclusion in the source proaram of sub- 
stitute or additional lLanquage elements. 


(7) when a function is provided outside the source proaram that 
accomolistes a function specified by any ocarticular standard COHOL element, 
then the implementation must not redquires, exceot for Fnvironment division 
alementss the specification of that external function tn place of or in 
gsddition to that standard lLancuaue element: 


The followiny qualifications apply to the American National Standard COROL 
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Lements whose syntax 1s 


SCURCE=COMPUTER 
VEJECT=COMPUTER 
eFfYy ~ ¥ 


SIZE ci 


pL phubet=-name 


elements 


Cevse 


ENTER statement or nots at the 


meet the requirenents of this standard. 
LANGUAGE SPECIFICATIONS 
in the followtna lists cenend on imolementor defini- 
the specificaton ot the syntax or rules for the elements. 
partly implementor-cefined are: 
Implementor-Defined Aspect 
paragraph computer-name 
peraaraph computer-name 
suse intescer 
implementor-name; whether imnle- 


fication: 

ae There are certain language elements whicn pertain to specific types 
rcware components. In orcer for an imnlementation to meet the require- 
of this standard, the implementor must specify the mininum hardware 
guration required for that implementation and the hardware components 

it supparts. Furtners when Suoport is thus claimed for a specific hard- 
components, all standard tanouace elements that pertain to that comronent 


be imolemented if the nodule in whicn they appear is includea in the 
mentation. Langouace elements that pertain to specific hardware com- 

ts tor which support 1s not claimecs need not be implemented. Howeveres 
bsence af such elements from an implementation of American National 

ard COR L must be specified. 

t An implementation of American National Standard COBOL may include 


option of the inplenentor. 


6 An implementation that includes, in addition to a specified level of 
of the tunctional nrocessine modules and of the Nucleus, elements or 

Ions that either are not defined in the American National Standard COBOL 
fication or are defined in a aiven level of a standard module not other- 
included tn the implementation, meets he requirements of ttis Standard. 

is true even though it may imply the extension of the List of reserved 

by the imolementor-, and prevent proper comoitlation of some programs that | 
the requirements of this Standard. The imolementor must specify any 
nal lansuage Clanauace nat cefined in 2 specified level but defined else- 

im the Starndara) or extensions (lanquace elements or functions not 
ed in this Standard) that are included in the implementation. 
the In stenerals the American National Standard COBOL specification 

fies no upper Limit on such thinas as the number of statements in a pro- 

the number of Operands permitteo in certain statements, etc. Ee SEs 
nized that these Limits will vary from one implementation of American 

nal Standard CIROL to another and may prevent the oroper compilation of 


mentor-namnes are provided. 


The 


SPECIAL“NASFS paranrapoh 
ASSIGN clause 

VALUE OF clause 

RERIU clause 

CALL and CANCEL statements 


COPY statement 


Area F&F 


Guslification 


elements whose effect is partty 


Element 


alphahet-name 


implementor-name switches 


USAGE IS COMPUTATIONAL 
clsuse 

USAGE IS INDEX clause 

SYNCHRONIZED clause 


RCCEPT statement 
DISPLAY statement 
Numeric test 


impt 


implementor-name 
imp lementor-name 


implementor-nane; whether implementor- 


es are provided. 


lementor-name and the form; the 
imolementor provides at least one 
of seven snecified forms. 
and the 


netween operand 


orocqram. 


relationship 
referenced 


rFetnween Library-name 
and the Library. 


relattonshio 
text-name, 


lancouace-name 


The location. 


The nunber of character rositions. 


The number of qualifiers; at least 
five must be supported. 


ementor-defined are: 


Imolementor-fefined Aspect 


The corresponugence between native and 


foreian character sets. 
whether setting can channe during 
execution. 
automatic 


kepresentation and whether 


alienment occurs. 
automatic 


Representation anc whether 


alianment occurs. 


imolicit FILLER positions are 
their effect on the size 


whether 
generated; 


of oroup items anc redefinina items. 

Maximum size of one transfer of data 
in Level 1 Nucleus. 

Maximum size of one transfer of data 
in Level 1 Nucleus. 

Representetion of valid sian in the 


ahsence of the SIGN IS SEPARATE 
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clause. 
q 
Comparison of nonnumeric items Collatine sequences where NATIVE or 
implementor-name collatina sequence 
is implicitly or explicitly | 
specitied. ] 
Arithmetic expressions Number of oleces carried for inter- 


mediate results. 
clements That Pertain to Specific Hardware Components 


The standard Lanuuaae elements in the List that follows pertain to specific 
types Of hardware comoonents. Trese lanquane elements must be implemented 

in an implementation of American National Standard COf8O0L when support is 
claimed, by the implementor, for the specific tyres of hardware components to 
ahich they pertains and the module in which they are defined is included in 
that imelementation. 


Element Hardware Component 


' 
7 


T clause Device cavable of sunportinga the 
specified code. 


[1PLE FILE TAPE eclteuse heel 
CLUSE..eREEL/SUNIT statement Reel or mass storage 
CLOSE.~..NO REWIND statement Reel or mass storage 
OPEN ..eREVERSED statement feel with the canadility of makina 


records available in the reversed 
order; mass~storage with the cap- 
ability of makina records avail- 
able in the reversed oroer. 


OFEN. «eNO REWIND statement Reel or mass storage 


OPE™...e1-0 statement Mass storaqe 
(Sequential I-0 only) 


Ore FATEND statement Reel or mass storage 


REWRITE statement Mass storage 
(Sequential I-00 only) 


SENDescsBEFORE SAF TER Pevices capable of vertical posi- 
APVANCING statement tionina; devices capable of action 
based on mnemonic-names. 


USEs.eeI70 (Sequential “ass storage 


WRITE se sREFORE/AFTEF Pevices capable of vertical posi- 
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ADVANCING tioning; devices capable of action 
based on mnemnonic-name. 


Ex 
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| The Federal COBOL Standard 
The COBOL compiler validation results enclosed in this document reflect the 
degree to which the subject CSROL compiler implements the Federat COBDL 
Stendard. The Federal COROL Standard is essentially the same as the 
American ational Standard Programming Langquane CORODL, ¥43.23-1974, with two 
exceotions: 

The Federal COBOL Standard defines 4 levels and the ANSI 

Standard defines only the minimum COBOL implementation and 

the full standard. Low and High levels of the Federal 

COPOL Standard (see 1.5.41) correspond to the above two ANSI 

Levels (minus the Report Writer module). Two additional 

levels, lLow-intermediate and hian-intermediate have heen 

incluced in the Federel Standard hetween the hinhest and 

lowest subsets. These additional levels accommodate 

hardware which cannot support the full standards but which 

1S capable of implementinoa more than the minimum standard. 

The Federal COBOL Standard states that the Report Writer Module 

1s not mandatory nm eny Federal levels» but that the specifitca- 

tions contained in k4.243-1974 should be used to the extent 

practicals consistent with requirements. 
The Federal COHPOL Standard reauires that a compiler contain as a minimum the 
elements specified tin at least one of the Feceral levels. No restrictions are 
imposed on the inclusion of selected features from hioher levels or even unique 
vendor extensions. Comnatibility anouno various implementations of a aiven 
level centainine additional features must he controlled hy manaaement imposed 
standards nd restrictions. 
La Det Federal Standard COBOL Levels 

Ss Federal Standard COFOL specifications are the lLanouage specifications 

contained in American ational Standard Prosramming Lanauage COROL, xX3.25-1974. 
For purposes of the Federal Standards the modules defined in ¥3.2€3-71974 are 
combined into four levels. Not all computers are large enouch to accommodate a 
CIXROL compiler containina the full ANSI Standard. Therefore, the Federal 
Sovernment requires that all comnilers acquired by its aacencies contain as a 
ninimum one of the four Federal levelss depencdina on machine sizer confiouration 
ind user needs. The knowledoe that atl computers will support at least one of 
these four subsets simplifies the task of developina machine-independent COBOL 
proarams. 

bs The four levels of Feceral Standard COROL are identified as: Lows 
Low-Intermediates Hiah-Intermedtates and High. Fach Federal Standard COROL 
levet is comnosea of either the hioh or low levels of the nucleus and ten of 
the eleven Functional Frocessina Modules (FP’%s) defined in ¥%.23-1974. 
The four Federal Standard COBOL levels are reflected in the following table. 
The numbers in the table refer to the level within the FP" or nucleus as 
jesianate in ¥35.235-1974s and a dash in the table denctes that the corres=- 
pondina FP 1s omitted. 


mediate Hien 


Implemente in conformanc Federal Standard COBOL must meet at 
follewir requirements 


implementation must } all of the language elements of at 
the levels of Feder standard COBOL. 


, The implementation must all of the requirements defined in 
American tational Standard COFOLs X¥3.23=-1974, Section Is oaraaraph 1.57 
tion of An Implementation of American National Standard COPOL which is pro- 
vided im section 1.4 of this VSR. 


Defini- 


Gs The implementation must provide a facility for the user to optionally 
specify a level of Federal Standard CURNDL for monitoring his source orogram 
at comnile time. The monitorina will te an analysis of the syntax used in a 
source proaram acainst the syntax included in the specified level of Federal 
Standard ( Any syntex used in the source oroqram that does not conform 
to tr al € hy the user selected level of Federal Standard COBOL will be 
{iaanose e Syntax ciagnosed as not conformina to the snecified level witl 
be identif ted o the user through a diagnostic messacne on the source proaram 
lListinno. The diaanostic messaqe will contains, at least: (1) The identification 
ef the source procram Line number 1n which the nonconforming Syntax occurss 
(2) the identification of the level of Federal Standard CO8O0L that sunnorts 
the syntax or that the syntax is Monstandard COPOL. 


version 


fe | 
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Committe 


recuesti 


Federal 


Feder 
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f the WSR 


COROL Compiler Testine Service may make full end free public 
of the Validation Summary keport (VSR) in eccordance with the 
Information Aet” ¢€5 UwWS.C. #552) ~ The results of the validation 


for the nurpose of satisfying United States Government requirements, 
only to the comouter system, operatinya system releases and compiler 
jentified im the VSR. 


ompiler Validation System is used to cetermines insofar as is 
the dearee to which the subject compiler conforms to the COBOL 
Thus, the VSR is necessarily discretionary and judgmental. The 


tes Oovernment does not represent or warrant that the statements, 


of them, set forth In the VSk are accurate or complete. The VSR 


t to oe used for the purpose of publicizina the findinas summarized 


ces of Additional Information 


c1-1 defines the Federal COROL Lanquace Standard. This publication 
Le from the Cffice of ADP Standards Manaqements» National Bureau of 


PSH pAgtorme Oe Care oe be 


1 CORSL lLanauagze specifications ere given in the publication 
ational Standara Programmina Lanauage COROL, ¥3.23-1974"5 available 


erican National Standards Institute, 1430 8roedways New Yorks New 


tion of the COBUL Compiler Validation System is contained tn the 


arcde. Phas ocument exnlains how to run the compiler validation 


User’s Guide and a mecnetic tape conteinina « copy of the CCVS 
ire vatlLable from the National Technical Information Service, 
ia Virativas 22795 ke (Grderina informatian can be obtained from 
COROL Compiler Testitna Service.) | 
vests for Interpretation | 


recarding this VSR or the CCVS in neneral should be forwarded to the 


eny problem cannot be adequately resolved through the FCCTSs the 
intercretetion will be forwarded to the federal COPOL Interpretation 


for final resolution. 


describinsa the validation process includina the srocecures for 
9 Validation and resolution of auestions involvin Interpretation 


current Federal Standars is available from the Departrent of the Navys 
COBOL Comniter Testina Services Washinatons 0.C. 20376. 


an 
facrl steres 


odules and Lanacuave Elements Fxeluded from Testina 


ofticial validations, certain CCVS tests may not be usecs and certain 


provided by the subject compiler may not he tested. 


Federal Standard COPIL Approved Interpretations 
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The National Bureau of Standards published in the Federal Recister Vol. 41 
No. 174, September 14- 1974, an approved interpretation of Federal Standard 
COROL as pertains to the evaluation of arithmetic expressions in the COMPUTE 
statements. This interpretation states that “size of the intermediate result 
field is implementor-defined.” 


a 


Since the results of evaluatinos arithmetic expressions are not predictable, all 
COMPUTF statements and IF statements containina arithmetic expressions have 
peen removed from the COROL Compiler Validation Systen. 


1.922 feport Writer odule 


FIPS PUR 21-1 excludes the Report Writer Module from the Federal CORSL Standarc. 
However, tne Keport writer “Module is still tested durina a validation if support 
for taat module is claimed by the compiler vendor. 


ate Communication “iodule 


Although it is part of Federal Standard COFONL as cefined by FIPS PUB 21-1 the 
Communication “odule is not currently tested in the course of an official vali- 
dation for two specific reasons. Firsts a large volume of requests for inter- 
retation cn this module have been submitted to the coanizant ANSI committee 
¥5J4) for resolution. Secondly, facilities for testing were insufficient to 
Jetermine the validity of the Communication “odule test procrams curing the 
development of CCVS74. 


teea4 Vencor Omissions or Extensions 


from the 
molementor 


Lancuane elements are not tested which have been leqitimately omitte 


imolementetion by the imolementor (refer to 1.4). Additionally» no 
extensions to the standard COBOL laenguace are tested tn any way. 


d 
1 
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Pace Timeliness of the Validation Summary 


The timeliness of the Validation Summary 
and their related operaetina systen software are modified several 
Tne Compiler Validation System used to validate compilers is 
turino the life of the system. Therefore 


ally released verstonss cneck with thes 


Director 
Federal COBOL Compiler Testina 
Department of the Navy 


Reports 


Feport 


to emsure 
of both the vendor's compiler and the Validation 


Service 


Washinutons DO. C. 2OS Fe 
(282) 697% =1247 
Please use the Validation Summary Report num 
correspondina with the Testina Service. 


is important. 


hat the 


System are 
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of this 


the 


latest 


report 


Compilers 
times a year. 
also updated 
version 
latest offici- 


when 
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SECTION. 2s PFTAILED EVALUATION OF ERRORS. 


This section summarizes the results of the compilation and execution of the 


rroqarams comorisinag the COBHUL Compiler Validation System (CCVS). The version 
the CCVS usec during this valication ts shown tnside the front cover of the 


Co 


Section 2 is made up of a variable number of subsections. The number of sub- 
sections is dependent on the tevel of Federal COFOL heingn validated. There will 
de a Subsection for each level of each module which is validated. If the hich 
Level of a mocule is validated then there will he two subsections for that 


module; one for the low level and one for the high level. 


ad 


validation of tne luw Level of Federal Standard COROL woule result tn three 
a 


ubsectitions bein: present. One for “Nucleus level Tr one for Sequential I-0 
evel ts and one for Table Handling level 1. 


Ww 


a= 


acn error or deviation noted in this section makes reference to a program or 
uncttonel C®%FUL module contained in fppendix A (Validation Summary Workina 
ecument). This reference provisces the documented results of an occurrence 

of errors/deviatatons detected durina the runnina of the CCVS usine the compiler 
within the environment identified within this docunent. The Validation Summary 
Aorkinga Decument is presented in sequence by functional modules functional 
module level and proaram number as defined thelow. 


> 


Fach prooram in the COBOL Compiler Valtdation System 18 identified by a 5- 


cheracter proeram name. The name associates the routine with the functional 
processine module and Level of American National Standard Programming Lanquaae 
COBOL tested within the proaram. 


in 


The five character name has the seneral format XXNM™. The first two 
characters are atphabetic and identify the functionat module tested by 
the prooram. The permissable values are: 


C = wucleus 

TH = Tahle Handlina 
$G@ = Seauentiak J-9 
Ru - Relative I- 

IX - Indexed ]-t j 
£7J - Sort-Merae 

RW =- Report Writer : 
S&S - Seamentation 

Le& =- Litbhrary 


- Inter-Program Communication 
Communication 


Om 
1 


The third character of the audit routine name is either at or 2» and 
tidenttfies the level of the functional module being tested. Fach mocule and 
level is rerresented ty several procrams. The fourth and fifth characters of 
the proaran mame are sequence nunhers for proorams which test features itn the 
same level of the same functional processina module. 


’ 


As an examoles the prearam name C210 is the tenth proqram in the series of 


15 
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routines which test the secon? level é ucleus module. 


Description of Section 2. 


Fach error/cdeviation is noted by num in the left hand marain opposite 
the lLanouace element in question. Trt number ts used in section 3 to 
categorize errors by Federal level (See 1.5.1). Inserted directly below 
the lLanquace element ts a brief descrintion of the error. To the right of 
tne lLanaauce element is a page reference to *%3.23-1974- American National 
tancaro Proscrammine Lancuage CORAL. The reference at the end ot the 
jJescription of the error is to Appendix A which contains the detailed 
Information collected during the validation. The reference is made up 
af the routine name followed by an A or B CA for compile time or syntax 
error anc for execution time or semantic error) and a number which makes 
the error unique In Appendix A. 


Operational 


ucleus 
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Level 1 


symbols: S V 1 era 
* The scalina character "P*® is not permitted in a 
* PICTURE character-strincg. 
‘ (NC101.A.2) 


Lat Sequential I-% Level 1 

c-1.% represents the ninth error for Nucleus Level 1 

I1l-21 represents the page in *¥2.23-1974 where the lLanauaae 
element is defined 

* foxes the description of the error/deviation 


NETO cA oi 


represents: 


Prooram name = NC101 
Syntay error = , 
second error - 2 


LE 


NUCLEUS 


| 
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LEVEL 


iInquage Concepts 2. «<« « « « 


Characters used for words 


1, se oF 9 


L 
r 
A 


a 
a Ge cavce 2 
(hyphen or minus) 
aracters used for punctuation .. . 
quotation mark 
left parenthesis 
riaht parenthesis 
nerivoad 
SOCE 
equal sian 
acters used itn editins. 
space 
zero 
plus 
minus 
credit 
debit 
zero suppress 
check protect 
currency sien 
, comma 
c period 
/ stroke 
Separators. 2 . « roe 
The separatorss § ‘ comma, 
attewed <2 . « 
Character-strines 
€ORDOL words « « 
Not nore than 38 charac 
User-defined words a 
data-name 
ust begin with an alphabetic 


lLevel-nunber 
mnemonic-name 
paracraph-name 
oroeramn-nane 
routine-name 
sect ion-“-name 
SYSEEGM=NSMWES. «5 « % & «@ 
computer-name 
inmolenentor-name 
Lanocusue-name 
SSOrVEd WOFdSs . « « 
Key words 
Jptional words 
Figurative constants. 
ZO RE 
SPAe 
WIGH-VALI 
LUW-VALUFE 


} 


Cheracter 
Yust be unique; may not be qualified. 


LUOTE 
Special-character word 
Et eRAES = <2 a ie aw Se = rn 
Nonnumeric lLiterels have hs fron 
throuch 120 characters 
Numeric literals have len from Tt th 
1& diaits 
PICTURE character-stringas 
Conment-entrie a, ere o 


keference tormst. 
Sequence number 
Are Pe é = = = 
Division heade 
Section header 
Paragqraoh he 
Data Division 
RECS Bs. aus Se 
Paragraphs. .« 
Data Diviste 
Continuation o 
In ly nonnumerd 
Comnent lines . 
Asterisk (*) comme 
Stroke (/) comment 


ldentification Divisic 
The PROCRAM-ID para 
The AUTHOR ¢ 
The INSTALL N parag 
The BDATE-wWR E yaraq 
The SECURI aragraph 


vironment Division. 
The SOURCE =-COMPUTER 
comouter=name 
The OR JECT~COMPUTER 
computer-name 
MEMORY SIZE clause 
PROGRAM COLLATING SERUENCE louse 
The SPECIAL-NAMES pa GFapR « « « « 
implementor-name I mnenonic-nane 
ing lementor-name J mnemonic~name 
ON STATUS 
OFF STAFUS 
rlphabetename clau 
CURRENCY SIEN clau 
DECIMAL =-POTINT claus 


fo OVS TOn « «<< 

Work tng=Storage Section « » « « ss 
the data description entry. « « » * * 
The LANK WHEN. ZERO Clause. « «+ «© « « % eee 
Fhe data=-neme of FILLER clause. « « « « a % « 
The JUSTIFIED clause (may be abbreviated JUST). 


1° 


eee 
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Pea aE te ceca coe LG ea ee iS I Tete eek Ae eet, ae EE=17 
}1 through 19 (level numbers must he 2 digits) Li=13 
Ein, see roo ee eg sie ce Wer me? er Ga OS er a ee a fee cote w LE=14 

The PICTURE clause (may be abbreviated PIC) . . Li=t8 
Character-string may contain 30 characters. . LI-18 
Deed Characters. hy We O fen. Fee vate: Vol 2,” 35 Li-18 
Iperational symbols: z NI cash ey le eee Piet 
FUNG ASCE IONM CHECASeUCEES. ss « << we a. co « LI-24 

( (nay be used enly in edited items) 
rg 


(may be used only in edited items) 


; Ccurrency sign) 


ha es 


u 

’ 

. 

* 

‘ 

.J 

i 

bone 

_ 

' 

Lao) 

= 


Replacement or floatinna characters 
: (currency sian) 


+ and -=- 
Z 
* 
Currency Soh SUOSETEU CTOs = 6 os = = 6 6 = = LE—24 
Decimal point Substitutions © 2 =~ & = « = = « Pee 
The REDEFINES clause (may not be neSted). . « « Li=27 
he  SiGM eteusek ws Soe sc a Oe me cw ue ie ee ce ce EL=34 
The SYNCHRONIZED clause (may be abbreviated SYNC) 11-33 
Vie USAGE sh aise is © S55 me ey ar een gee 9 (ee ae ow T1-35 
C PUTATIONGL (may be abbreviated COMP) 
DISPLAY 
Pre VAEUE clauses Go aoe te ee a Se ee ar el ek 11-36 
Literal 
PFOCeeoee Divisione wi 2 & «Ss Sse & & ee eS Pass 
CONGTETONG., CREF ESS TONS % 6 & eck Ss = x TI-4l 
SEES COTE DE nO eS eren onan a ue: (se oe) ter Se Se) See bi=44 
Relat iom COonmarirohe «662 s & w= ec ee eu S 11-41 
Relational operators 
CNOTT GREATER THAN 
CNOT] LESS THAN 
ENOT) EQUAL TO 
Comparison of numerte operands. « « « « « TI-42 
Comparison of nonnumeric operands Cooer- 
anas must be of eaual Stzek «. © a a «= aS 
CLESS (CONG RETOT wn aoe o ete SS eo we eS Ti-43 
SOT option 
SWTEENR=StatUs COnagrteiow « . « 2 2 2 « 2 & « 11-44 


TRE An TOHREE TE STGtGHENTS 2 2a 2 es «ee eS % 1 RNY, 
Arithmetic operands Limited to 18% diaits 


Overlapping operands, « « 6» & » « s 6 & & & & ss 1) Ua Nt 
The ACCEPT statement Conly one transfer of data) Ii=53 
The ACS Slate eehe =) sw ke See ee 6 ek SS eM Pi=55 


joentifier/literal series 
TO tdentifier 

SIVING identifier 
ROUNDED phrase 


20 
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SIZE ERROP phrase 


Tre ALTFR statement (only one nrocedure-nane). . TI-57 

The DISPLAY statement Conly one transfer of data) T1-59 

She OLVERE staremGAnt 6... < «a « = @ & & 6 ee « TI-41 
INTO identifier 


HY tdentifter/literal 
GIVING tdentifier 


ROUNDED phrase 
SIZF ERROR phrese 
CL Eke Se ED Ora san tee tat Ma es eee sel la at eae. tae a 11-62 
THE EXLY SPOTEMCIE lel ic we er oe See ee ee ey ne 11-44 
The oF statement (procedure-name is required) Li-65 
PEPENOING GN phrase 
The IF staterent (statements must be imperative) 11-66 
ELSE onraseé 
The INSPECT statement (only sinale character 
Patt ReeO ss. tas aCe faeces a ee "se Le we tae eS 11-68 
TALLYI* phrase 
ALL 
LEADI 
CHALACT : 
' LACING phrase 
StL 
LEADI 
FIRSI 
CHARACTERS 
TALLYIVGS and RFPLACINS phrases 
The OVE statement «3 2 we Se ew ee eM TI-74 
1 identifier 
Icentifier series 
The WETEPEY Statement: = 6 @ Se we Boe lem ds TI-77 


EY identifier 

CIVING tdentifier 

KOUNDED pnrase 

SCIZF EP ROR phrase 

the PERFORM sStatenehts & «<< A & @ «“e @ Bw & < 11-78 

procedure-name 

THRU ofrase 

TIMES ohrase 


The STOP Statewent «<< 2 = we & Be wy me Se we @ Ti-85 
Literal 
Rye 

The SUSTRACT statement . oe we ee ee ee cg Me ee 11-89 


oe 
uv 


jdentifier/literal seri 
FRO™ yaentifier 

SIVING identifier 
ROUNDEO phrase 

SI7— ERRGR phrase 
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cine NUCLEUS LEVEL 2 


Alt elements of 1 NUC 142 are a vart of 2 NUC 1¢2 


PAN SUARe HOCH COR So? ats ta eee he ee lial ate eS ar tek tac dale oo 1-75 
Characters used for punctuation=. Js & << 4 s «ce « I-65 
, comrma 
. semicolon 
Characters used ter arithmetic operations. <« «= « =< « 1-52 
+ addition 
- subtraction 
x multitolication 
/ division 
xe exponentiation 
Chartacters used ah relattens i. 6. 4. 26 «2 m 6 es me we 1-66 
eo egual to 
> areater than 
< less than 
SQparaetors. = ss 2 2) S48 e a 6 es SS Oe Oe Cee oe os oe ee ce be T=75 
The separatorss semicolon and commas are allowed .. BD 
CRAP AGUErSGt cries. se <> i ata ea, Soo aa aeons Mera ater etn L=76 
COBU MOPS. Ss Ss ca cats, “SA 1G XS a owe ME Oe ey ee es ee 1-76 
MUSEO“ CETINEG WORCS =< a elus 6 a im et ee ee ee ee I-76 


condit jon-name 
data-name 


Need not begin with an alphabetic character. « Ii=1 
ry be qualified if necessary for uniqueness . 5 | 
GiGi RN CIGr (WGIE tS ce) teresa y can Sok wok, Heal “os UsltGe tel. ar ay ee va cer aie 6 1-79 
PEGUFATECE CCORSTSALS Gis ws 5 = ho eee ee wm ee l=£0 
ZEROS; ZEROFS 
SPACES 


4{TGH-VALUES 
LOW-VALUES 

QUOTES 

ALL literal 


COMMECEICES Go-< & @law © & es BS me He ee we « io 
sualifier connectives: OF, IN 
Series connectives: » (Separator comma) 


ind ; (separator semicolon) 
Loaical connectives: AND,» CKe AND NOTs OR NOT 


UAULECECORION A ee ok oe ee ee ee Oe eS A Se Se SS I-87 
ROTEGrFenCe TOCMAG & = 2 He ee ew A Se ee we me Om ee Ce 1-105 
Continuation of Lines Ccontinuation of words and 
MUMEFTEC Literats. ws attowed? 222 oe wk ee ee ew * LE=7 
LSCHEPETESCION BUVISIOhe « © & eo we me Se S&S Soe ee me eS 1-94 
rhe SCAFE=COMPILED peragraohs «& s ew eee hee ee wh eH X IIl=+4 


tnvironment Sivision 


Rye SPEC ERAL“NANES Paragrabhea « « «» & © ee © e = % Se © @ Ge. 
slohabdet-name clause 
literal 


Cate DIVISIOhs 2m ee wee et ee ee ee € Se ee ee eS 1-97 


The data des 
cevel-nunter 
FT through 
ce 
Ine 
The 
data-name 
cata-name 
The VALUE cl 
Literal -1-, 
Literai-1 
literal ra 


REDEFINE 
RENAMES 


pivi 
Arithmetic e 
Conditional 


Frocedure 


Simple con 
kKelation 
Relati 
rnOT 

rnt 

rNAT 
Conpar 

un 


Condit ion-name 


sTaN con 
NOT of 
Complex co 
Logical 
senatedc 
Combined 
Aphreviate 
ult iple res 
The AECCEFT s 
of trans 
FROM phras 
£DO0 stat 
T identif 
IVING ide 
CORRESPOND 
The ALTER st 
The series 
COMPUTE 
icentifier 
ROUNDED poh 
SIZE 
The DISPLAY 
of trans 
JPON prhras 
SI] VviIbe S 
INTO icent 
TVIN ife 
REY AIMNDER 
The TG st 


ERROR 
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Cripttrom entry <2. «. « © = 


ciate chin, ea as er Dae! Wen ate con unedle 
49 (level-numbers may be 1 
S clause (may be nested) . 
clause (may be nested) .. 
THRE data-name 

RENO a omen | canal) eee a ate con aes 
Literal -2 

THRU Literal-2 

noe series 

SUNG se ane, a svehie at Ler tet tae eh te 
PMCS SS ROMS G o @ = o a le & 

PROPESSTONS ~< = og oa © ow 
Pw Hee ee ele ey ee Gay ve ie, fe 
Pe sGONERE LOR! aie leader ee “ee 
nal onerators 

; = 

+ > 

J< 

ison of nonnumeric operands 


equal size are allowed). . 
COMATEVON ae ce. we te 
OREO: «ose @ “aoe lene Je 
tion 
AP TENORa Ma vel ose we We oe ce 
yperators ANDs ORs and ¢ 
simpte. condition ... « «= « 
and nmesated combined condi 
d combined relation conditi 
ults in arithmetic statemen 
tatement (no restrictions o 
fers Of Datate « 2 6 me « 
o 


CMENWE « e & ee ee le Se a ee 
jer series 

ntifier series 

ING phrase 

ATCHENT ss «+ © « & & & & & @ 
option is allowed 
Statements « = = =» & & & & 


series 


frase 

phrese 

statement (no restrictions 

TOPS OF Datars. « a «je wv > 

t 

CStement »«» «= ©» & © & & © % 

ifier series 

ntifier series 

pnrase 

stement Cprocedcure-name may 


2 


_ ~—™s .. 


or 

Cope 
tion 
on. 
ES. 
rick h 
on t 


be 


¢ diaits) 


i ee 
- © © 8 © 
-— © © #& «© 
= = © © «© 
-_ = © © «© 


‘i a ee 
=~ iw fo le 
oe -— ee «e 
a ae ae ee 
eo «a & @ & 
a a ee 
a a ee 
ae Te 


- . - - - 
- - - - - 
- . - - - 


he number 


omitted). 


Pi< 2 
ie Es 


1=99 

PL=S9 
11-41 
11-41 
Pps 


LE=Se 


it=39 


Li=67 


Li=65 
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tie FE statement nested statements? . « «<{j <2. s« « * 11-66 

The INSPECT statement (multi-character data items) . . 11-64 
series 

ive. WRC bu erie Cente oe ao teh cy er er 4S ats ery Gel tor fae ge ae 11-74 


CORRESPONDING phrase 
The UP UECEY Stathememe «ce 6 06 « Ge on a Ge @ etm od eS 11-77 

AY identifier series 

GIVING tdentifier series | 
Rie PEREDRM Starememts wc soe ee > “ade we. et eS) ee 11-78 | 

UNTIL phrase 

VAKYIN ohrase 


The. SOC Sot a RG mre a. fai ei boat palo ec ar Je rake Tati es vet ef eal mb tm to 11-86 
DELIMITED series 
POINTER phrase | 
'VERFLOW ohrase 
The SUBPRRECT statement << 2 @ <= os 6° @& @ @ & = we me, So II -&9 | 
FROM identifier series i 


IVING identifier series 
CORRESPONDING phrase 
The UNSTRIS Stacarmeme. a. ce «eS he oe wt ce Se el me Sm TI-91 
BELIMITED BY phrase 
FOINTER phrase 
TALLYING ohrase 
IN OVERFLOW phrase 


‘ AN 
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ate TABLE HANDLING LEVEL 1 


Lancuaae Concepts 


USERTUC PUNO IMACAS.. ba ce, “om, Ge Ver po fee Coo eon omen arene 1-76 
incex-name 

SUubsSeripting = S levels 4.6 sa ca «@ ee. ms ue) oes J=89 

iinet: = Fy wbeyeitie: 25S ke aa en on! ec eed ee ee 1-89 


Data Division 


The GOURS: jelensie “7s ao car er tes, ee ee eee Tit=-2 
nteger TMES 
INDEXED FY index-name series 
Tre USAGE IS INDEX claus ais tad Cen et rental! ok Mas see Pa=5 
Procedure Piviston 


£ 7 
ClHETOR CORATERONRS <« = 24a ta & & Wee Soe be eee IIlf=+6 
Comparisons involvine index-names and/or 

index data items 

IMEPLEPRING ODER BNGS . < tate ja im 2 mee ve eles tee ELI+6 
¢ SER StRREMED sce Se ee co An OS ee ae oe ees L1II=11 
index-name/identifier series 


ir exr-name 

ye Y identifier/inteaer 

DOWN Y tdentifier/integer 5 
Ingex-name series 
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TAPLE HANOLING LEVFL 2 


ALL elements of 1 TRL 1-2 are a part of 2 TBI 


Nata Pivision 
Rive COCOtR SG eaUGe soe ee ee Cee me me we 
Intecer-1 T9 inteser-2 DEPENDING ON data-name 
ASCENDING/DESCENDING data-name 
data-nane series 
ASCENODING/DESCENDING series 


ure Division 

SEARCH statement. « -« 
VARYIN phrase 

AT END phrase 

WHEN ohrase 

SEAKCH ALL Statement. - 
AT END ohrase 


SHEN phrase 
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a SEGUENTIAL I-O LEVEL 17 


Languece Concepts 
USGrsdet ined (WOES = co =. esa cee ele le, nlc Jae et ee ce I-76 
file-neme 
record-name 


R=@. Status, 20-2 Se See eee ce i me ee ee ce ee oe a ee Ce 


Environment Division 
The FILE-CONTROL porséaraph.< i = 2 6s eee Se wm we “RG 
Cie £Pte -COntheot entry = cove tel a ce ete Cale a oe ete aa Iv-4 
SFLECT clause 
ASSIGN TO imolementor-name clause 
RGANIZATION 1S SEQUENTIAL clause 
ACCESS MODE IS SEGUENTIAL clause 
it 
7 


LE STATUS clause 

Ene T=60=CONTROL ‘paraarsot.. c:«s jo. = fe & leo tecke! «= elie. ws & IV-6 
RFROUN clause 
SAME AREA clause 
SAME AREA series 


Data Division 
Pres «SRE Were ake ces ae ck has ee Ge eee ec cae cael ee eg an? Clee, Sem” cee ts Iv-9 
Ehe $HGe Gisecrirpe ton eniey = 26 le soe a we ee eee [V-10 
TRE FeCORd GeSCHIPtIOm EGRURY <2 6 2. @ je mm i we me le Iv-9 
THE REOCE CONTRENS scl auset—s Baa Se eo Se Sue ee URS 
inteacer CHARACTERS 
intener RECORDS 
the GOCE~SE). clauses 20a aw me Gla & se me & e See & IV-12 
Fie DAER RECORES 7G: atiS Gia we. Ca de Se ee mee ete ee ae IVv-13 
ceta-neme 
data-name ceries 
The CABELL “RECOROS ‘clause . oo aie we ee a & & © cle ee IV=-14 
STANDARD 
OMITTET 
The RECORD CONVAENS Glause 4) ale eh ow Ce OK OS ee OS IV-1 
inteder-1 TU inteaer-2 CHARACTERS 
rhe VAEGE OF ‘clause. << «ses HOS Se Se eS eRe HS we Iv-19 
implementor-name [S Literal 
implementor-name IS Literal series 


frocedure Division 
Tne CLOSE statement Conly a single file-name may apnear 
th a CLOSE Steienmenti. « « «aw ao & we es ee we AVES 
REEL 
UNIT 
The OPE" statement only a sinole file-name may appear 
it ah GPEN Statenentl« « «= ee «= se & & we BS IV-24 
INPUT 
UTPUT 
I=< 
The READ statement « «=. sw & & 6 wt «+ Slee ee eS IV-28 
INTO identifier 
AT END phrase 
The REGRITE Statements. «ow & we eee Re Se ee we UNE 
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FROM identifier 
Bie USS Es SRA Eerie i ee eRe ce vas ay ota at eee (ns ies vel GAM Mer ete’ Ge IV-32 
FXCEPTION/FRROR PROCEDURE 


ya 


fFile-name 


1N INPUT 
ON NUTPUT 
ON T=< 
ECL Ee AAR les Fe ele Ses ed TL IRGUIT Be pie che Gr Skt icy Moke men Se ea en a ole hee IV-34 


FROM adentifier 
PEFORE/AFTIFR inteser LINFS 


c 1 eee wm we ww eM Bw ew ew em we wm me mw ew we eM me ew ew ee wm mew mm ew mew ew wm wm wm em ew eww ow ee eww ew eo ee ww oamwoeoe 
* f REEVE ani EFORE ADVANCING ZERO statement does not execute 
acorrectly. The system prints the line and then advances to 
"et NSM PSQrs ($Q101 RB) 


LB 


Lanouaae Concepts 
SUT CCW ea Ry ai Ghee Be ESF ae tS tae Se tail ie Pc an” oe Dea Fin ee I-80 
CINAGESCOUNT ERs, < «tb. ace “oe « weer wae ee ee te IVv-3 
Cnvironment Pivision 
Fhe -FPILRE“CONTRGL parakgraph s « wa 2 « <2 & w 2 <6 «-« IV-4 
Thre tite conte (entry oo es fern ee ete ea me ee IV-G . 


SELECT clause 
OPTIONAL phrase 


KF SERVE integer AREACS) ct mse 

The: F“O=<CONFTROE pshaarapnhe «<< . ~ «-« » © « = w @ @ IV-6 
SAVE RECOR AkEA clause 
SAME RECORD AREA series 


FUL TIPLE FILE FAPE clause 


rhe. file descetnttam entiewe, co se ae we = @ & = « 1V-10 
The BLOCK ¢ TASES cOi tithe: oe Fak cat Serene oer eter fae fou fa kes Iv-11 
inteqer-1 TO integer-? RECORDS 
intener- TO intecer-2 CHARACTERS 
The LInAG CURSE oO HE ke setae eee ben ay See eh Gh me, Sar ee a Se IV-15 
2o.% =e == PR i en ee te ea crew A cco mPa ct Bf reel Cor a aN a alk ace omc te 
*Proarams containing the LINAGE clause did not execute correctly. 
* (S@202 Be SG2t% As SQ214 Be SQ215 8) 


The VALUE  *GWaWsie (280s val eee ve ce a eh ae ae ee ae Iv-19 
imolewmentor-name LS datacname 
i i Le entor-nare Is Yatername series 


Procedure Division 

THe CLOSE StSteMGNt wf ce a we Boe ew em Se ew Iv-20 
1D» RE“MOVEL» or LOCK 

file-name series 


The OPEN StAtTEMENT., « Se we woe Oe a mw me em ee Iv~24 


eek ttt ttre ------- we ee ee eee ee mee eee eee eee ee ee ee ee we ewe ww meme eww ew eee 
WOPEN «we. REVERSFD 45 not supported by this system. This is not an 
xerror as OPEN «wee REVERSED t58 a lLanauaqe element that pertains to 
* specific type of hardware component. See section 1.4. 


* (S6206 A) 


file=nane series 
INPUTs OUTPUTs I-00 and EXTEND series 


29 


‘ 


Y 
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Lv on OR C4He 


SE statement . en aa ie 
CEPTION/ERROR RQ ) F ON i am series 


XCEPTION/ERROR 
skITE statement 


‘tements programs c aining the LINASF clause did not 
correctly. S@Q@20e f $92 fie SKe BR, S@215 B) 
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Federal 


ection 17.5 explains e four levels of Federal Standard COSO and their 
relation to An ica ational Standard COBOL. This section lists the dis- 
crepancies des ibed in Section 2 ny the Federal level in which the problem 
ye curs. ! s listed for a lower level are also errors in any higher 
Levels» even oug they are listed only in the lower level. The paraaraoh 
number from § 2 is used to reference the errors in each Federal level. 


aan 


statement. 


Low-Internediate Level 


ate at Debu nodule level 1 is not implementec. 


icnh-Interme 


LINAGE clause - execution results not correct. 

wkRITE statements in orograms containina LINAGE clause. 
WRITE eAT END-OF-PAGE statement. 

Debug module level 2 1s not implemented. 


keys are not implementea. 
the Librery module is not imolemented. 


American yt jona 


ull American It iona sak igs iol YL consists of the entire set of lanquage 
elements deftned in t ANSE COBOL Standard (refer to 1.7). It is also the 
equivalent of hiah level Federal tandard COROL plus the Renort Writer 
odule. Therefore, this section Lists only those discrepancies found while 
ylidatin the keport Writer odule. 


fae po Jriter nodule is not implemented. 


SECTION 4, SOF TWAPE ENVIRONMENT. 


The compiler reterenced in this document was validated using the software 
environment described in this section. when usina a modification of the 
fescribedc environments the comoiler may or may not continue to conform to the 
Stendard. It should e noted that durino the validation processes an attempt 
Is made to validate as many different options as possible. 


< f comoiler ortionse implementor-names in the Fnvironment Divisiton 
and any form of cptimization which 18 not descrited tin this report could cause 
the compiler to produce a pronrem that does not perform accordina to the 


specificetions of Standard COBOL. Only the environment describea in this 
cument tas been use with this comniler to satisfy the recutrements of FIPS 
c 


7 
2T-1 and FPR 101-52.1305.1a. CAny deviations which must he corrected as 
per the referenced FPMRK are described jin Sections 2 and 3 of this report.) 


Ss or parameters used on the processor call statement for the compiler: 
Lowine options/parameters were used durina the validation. 


everal different options were used during this validation. The options 


map - Maps cross ‘reference, source 
re of the routines renuired special options for execution: 


The cs (Cobol switch) option was required to set the switch settinas 
for C1 and NC211. 


The tu Ccoentinue) option was reauired to override the SIZE EFROR condition 
im THe yng iS T2Ué2 x= 


The sd (sort directory) option was reauired for $1116. 
The nep (no end 29°) option was required when printing the output 


reports for SQ1014 S$@2e9t- SO202, S@212 throuth SQ215- to override 
the default page definition. 


- Fnvironment Piviston mpolementor-~names. 
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a jptimizat ion. The compiler may o ; ‘ optimization features. 

Tf there was an optimization feature 3 used during the 
validation process (durina 2 c i Compiler Validation 
System) to determine tf tts use caus t ome ihe precduce a oroaram which 
does not sive the expecteo results. “tza on iS invoked through 


the compiter call Statement then it ion paragcraoh 1 above. Tt 

it is invoked through the introguction c : ther than the Data 

and Procedure Divisions of the source progra i j own below. Iptimization 
which would require mocification to the PC j jure Divisvons is not 
considered in this reoort in that it is e s f the use of 
standard COROL and the validation crocess 


There t5 no specific ostimization feat } s compiler. 


erating system. 
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ECTION 5. ASCTI VALIDATION 
ot Purpose of ASCII Validation 
The ASCII Validation is performed by runnina a sequence of three CCVS74 
sroarams (541178, S119, Sa120) using special procedures. The purpose of this 
specral run 16 to validate that the compiler/operatine system being tested 
is capable of processing ASCII code represented on macanetic tape and 
punched cards that was produced (in accordance with the appropriate American 
National Standard) by another system. Tnere is also a macnetic tape and a card 
file created durine the validation which will he taken to another system for 
further processing. The vurpose is to determine whether the compiler/operat inc 
Syste being tested can also produce ASCII represented on nananetic tape and 
ouncned cards whitch can be processed hy a another computer system. 
Dae Applicable ANSI Standards 
Tne ASCII Validation is based on several American National Standards and 
gresumes their support by the compiler/operatina system betna validated. 
These are: 
Ts American National Standard Prosarammina Lancuegqe COFOL X3.23-1974 
- The CODE-SET clause is used to read and write the ASCII 
files. 
= The PROGRAM COLLATING SEQUENCE clause 1s used to process the 
Jata in ASCII mode as well as native mode. 
- Thke SIGN..aSEPARATE Clause ts used for signed data and att 
jata is tn the DISPLAY Ccharacter) mode. 
age American National Standard Code for Information Interchanae 
CASCIE) XS 24-1968. (Note that this describes the codes not the 
labelina and tape recordina formets.) 
a. American National Standard Hollerith Punches Card Coders 
¥3.26-1970. 
bs American National Standard Wacnetic Tape Labels for Information 
Interchanaes X3.27-1969. 
a. 
5S. American National Standard Recorded Maanetic Tape for Information 
Interchange ¢€3800 CPler NR7I1)- X%3.22-1967. 
be American Netional Standard kecorded Maanetic Tape for Information 
Interchange (1600 CPI» PR), *3.39=-197%. 

The lLanauace of the 1974 COROL Standard provides the capability to accept, 
orecesss and produce ASCII code. The ASCII Standard describes the code insofar 
75 the hit arrancement and configurations but does not address recording tect- 
niouess record formats or any labeling scheme. The *(U CPl» N7R1 magnetic tape 
recordin Stender? was used to establish the recaordina density and techniques. 
(160 CRI» FE based on %3.59-197% “Recorded Maqnetic Tane for Information Inter- 


et 
“2 
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change" could be used under speciakt arrannements.) The tape lLabelina scheme 
ssed in these tests is based on ¥3.2/7-1969 but is also compatible with the 
revision to that tape label standard. Only the VOL1- HDK1, and EOF1 labels are 


used. The records are fixed lennsth and unblocked. 


Bren ASCII Validation Process 


Duritn the validation, the Validation “anager for the Federal COROL Com- 
piler Testing Service uses tie ASCII1-encoded magnetic tape and card files 
In addition to the normal tape files associated with a validation. for the 
ASCII portion of the validation the following steps are performed: 


(he The tape file and card deck Cproduced on another computer system) 
are used as input to several proarams desioned to validate whether 
the system heinn validated can accept and process the data as 
defined by the respective standards. Any chances made during this 
validation to the source programs reading the data ere noted 


below Rh 3.4.4. 


rie A tape file and care file are sroduced during the validation which 
should prove to be identical to the files described in 1 above. 
These two files sare then processed on a different comouter system 
tao determine the degree to which the system beina validated sup- 
ports the ASCII standard. ‘ny channes made during this validation 
to the source nrogram producing the data are noted helow in 5.4.2. 


ialh Results for This Validation 


Te The ultics system processed the card decks the ANSI labeled 
tapes and the unlabeled tape correctly. 


Zi The “ultitecs system produced an ANSI Labeled tape and a card deck 
which were both verified later as heine correct in format and 
code set. The data records on the tape were preceded by VOL1, 
HDR1 and HDR2 Llebel records and a tane mark; and were followed 
by a tape marke EOFT and FOFe label recordss and a couble tape 
mark. Att labels were correct according to the annlicable ANSI 
Standard for magnetic tape lakels. 
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VALIDATION SUMMARY VIORKING DOCUMENT 


A-1 This appendix is a working paoer produced durina the validation 
and documents the results of the compilation and execution of each of the 
programs comprising the CCVS. The results contained herein are based on 
the use of the compiler within the Validation Environment identified in 
this appendix. This arpencix (VYalidation Summary Workinae Document) is not 
dart of tne official Validation Summary Report (VSR) and is not tntended 
*s usefulness or dearce of conformance 


to reflect in any way the compiler 
to the language specifications. 


Tne reader of this appendix should keep in mind that the same pro- 
blem area may apoear in more than one proarams but is considered only as one 
single discrepancy and as such is reflected only once in the body of the 
VSR. (The VSP will in turn only reference the first occurrence of the 
problem in the appendix.) 


The reference document for COBOL is FIPS PUB 21-1 €¥3.23-1974). 
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VALIDATION ENVIRONMENT 


COMPILER IDENTIFICATION: Multics COBOL Version 2.3% 
COMPUTER SYSTEM: H6150 (Multics) 
JPERATING SYSTEM: Multics Release MR4.0 
| 
| 
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CoM f ( 
ICATION LEVEL 1 and LEVEL 2 


he m ni 2 > ne 
omn ¢ i f r > 
u ' tien ¢ oar f were 
] > E ARO run 


neat 
) ! LEVEL 1 and LEVEL 


The Det 7 r + 
} ecuu modul 1S for ¢t a 
e ot j 
= We imples r( 2 
ented O° his om ile nd th 
t é C 8) 
t ane e \eDug 


wr . 
Ocrams were not run 
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INTER-PROGRAM COMMUNICATION LEVEL 1 


Tevoty through L€TtSs« TEST and reEts2 


Compiletion 
No errors. 
Execution 


& 


No errors. 


INTER-PROGRAM COMMUNICATION LEVEL 
[c201 through Ec2be 

Compilation 

wo errors. 

Frecution 


QFFors « 


LNVDEXED 


IxX701 tt 
A . 

INDEXED 

Ex201 th 

TX205 tt 
A 


L-@ EVEL 4 


rough 


1X 


107 


Compilation 


NO errors. 


Execution 


NO OF FOS <« 


1-0 LEVEL 2 


yrouan 


1x 
4 


204 


Compilation 


oOo G@FEOCS. 


Execution 


SEFors.. 


Comp tlation 


Alternate keys 


which 


re 


ferenced 


Execution 


The tests 


tests 


in 


these 


referencing 


CCVS74- 


are not 


programs 


inplemented 
elternate keys 


SR260 


caused 


for this comniler. Statements 


fatal diaanestic messaanes. 


alternate keys had to be deleted. The other 


executed correctly. 
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LIBRARY LEVEL 1 


through LB7107 


Compilation 
NO errors. 
Execution 


Oo errors. 


LIBRARY LEVEL 2 


Level 2 of the Library Module is not imnlemented for this compiler and 
the level 2 Library programs were not run. 
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VUCLEUS. LEVEL 1 
C401 through NC12U4 and NC151 through NC165 
= Comprlation 
errors. 
Be Execution 


Cf FGFS « 


NUCLEUS LEVEL 2 

VC2C1 through NC218 

A. Compilation 
errors. 


é Execution 


errors. 
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REEAFIVE F-O EEVEE 3 
RLIQFT throuaoh RLTO9 and RL151 through RL153 
A. Compilation 
NO errors. 
8. Execution 


vO errors. 


RELATIVE 2-0 GEYER 2 
RL2ZO1 through &Lé 
A. Compilation 
No errors. 
B« EX@EUL TON 


GFEGES:s 
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wRITES MODULE 


The neport writer module is not implemented on this system and the &eport 
erywter procrams were not run. 


through 
Compilation 
No errors. 
Fxrecution 


>? CFFGFS 


SEGMENTATION LEVEL 


through S6204 


Compilation 


NO errors. 


Execution 


errors. 
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SEQUENFIAL I-O LEVEL 1 
$8101 
A. Comnilaticn 
Oo errors. 
6. Freecutian 
WRE-TEST-3T farted. this test is a WRITE w.. BEFORE ADVANCING ZERO 
statement. The system prints the Line and then advances to a new page. 
$9102 through SQ@t21 
A. Compilation 
Oo €rrors . 
- Frecution 


No errors. 


A. Compilation 
VO errors. 
. Executior 
WRT=<TEST=371 fatled. This test is a WRITE ... BEFORE ADVANCING ZERO 
statement. The system prints the Line and then advances to a new pace. 
(See S@QTt017.) 
Sa7S2 and $6753 
he Compiltaticn 
Ko errors. 


ie Frecuti1on 


o errors. 
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SEQUENTIAL I-08 LEVEL 2 
sa2n1 
A: Conpilation 


oS errors. 


8.4 Execution 


G eFrers. 


omprlation 
Oo errors. 


ia txecution 
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This proaqram contains the followino LINAGE clauses 
LINAGE IS 50 LINES 

WITH FOOTING AT 45 

LINES AT TOP 10 

LINES AT ROTTOM G6. 
WRT=-TFEST=-07 contains a WRITE ... AFTER ADVANCING FAGE statement. The 
printed Line appeared as the last line on a locical paae instead of the 
first line of a new Logical pace. 
The comment Lines for wkT-TEST-08 through wRTI-TEST-171 were not printed 


correctly. 


$9205 throuah Se205 
A. Compilation 
NO GFEFOFS.. 
%, Enwecutton 
®Y €Frorsis 
Sac0é 


A. Compilation 


OPEN REVERSED 


C€VS control card 
from the source 


OS 


The *0PT4 M 
KFEVERSFD statements 


this system. 
OPEN -wex 


is not supported by 
was used to delete all 


proor wm. 


67 


Seen? th 
Ris 
sae73S 
r 
: 
: 
| 
; 
| 
p 
56214 
: 
f 


COVS?74-VSR240 


Execution 
vo errors. 
rovon S$O2T2 
Compilation 
vo errors. 


Cxecutior 


Vo GPrrers . 


Compilation 
4O errors. 


Execution 


TRIS program contains the following LINAGE clause: 
LINAGE cdata-name 

FOOTING data-name 

TOP data-name 

BOTTOM data-name. 
There were many errors in the Outout report. The blank line followina 
the first logical page was omttted for WRI-TEST-01. The first logical 
page was also incorrect for WRI-TEST-O2e and WRI-TEST-O3. A blank line 
was missine preceedina the detail lines and was added following the 
detail tines. 
WET-TEST-094 ts missinu two blank tines following the detail Lines. 
WKET-TFEST-"%5 drops the footina line and the blank Line which is supposed 
ta follow the detail line. 
The line p;rinted from an FOP clause for WRT-TEST-97 appeared immediately 
followtns the Last detatl line. It stould have heen the first line 
on the next pade. 
wany of the print Lines were skewed to the left on the printed output. 
Compilation 
No @frors. 
Frecution 
This pmregram contatns the followina LINAGE clause: 


6# 
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LINAGE 4) 
POP 2. 


WRI-TEST-O1e WRI-TEST-O02 end WRTI-TEST-U%S all containec errors. An 
extra line was printed at the bottom of each Logical page instead of 
at he top of a n®w pace. 


Compilatian 
No errors. 
Execution 


the comment line for LIN=TEST=01 was printed correctly. 4 sinale 
Line was printed on two lines. 


thravuan $921 
Comoilation 
NO €FFrOfs. 


Execution 


errors. 
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51701 through $1117 


Compilatien 


“© errors 


Execution 


errors 


Feecutior 


errors 
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TABLE HANDLING LFVEL 1 


TH1O01 through TH1114 and TH151 and TH15e 


A. Compilation 
errors . 
ie Execution 


errors. 


TH201 through TH2e2o 


Ais Compilation 


